home *** CD-ROM | disk | FTP | other *** search
/ Aminet 48 / Aminet 48 (2002)(GTI - Schatztruhe)[!][Apr 2002].iso / Aminet / text / print / Epson_600.lha / Install_Driver < prev   
Encoding:
Text File  |  2002-02-23  |  1.8 KB  |  60 lines
  1. . $VER: Install_Printer_Driver 2.6 (18/9/01)
  2. . Peter Hutchison
  3.  
  4. . WB 2.x
  5. If Not Exists c:RequestChoice
  6.    Copy Epson_Stylus_600#? Devs:Printers
  7.    Sys:Prefs/Printer
  8.    Sys:Prefs/PrinterGfx
  9.    Quit
  10. Endif
  11. . WB 3.x
  12. RequestChoice >env:cpu "Select Processor version" "Which version of driver do you require?" "68000|68020|68040|Cancel"
  13. If $CPU EQ "0"
  14.    Quit
  15. endif
  16. If $CPU EQ "1"
  17.   Copy Epson_Stylus_600.000 to t:Driver
  18. Endif
  19. IF $Cpu EQ "2"
  20.   Copy Epson_Stylus_600.020 to t:Driver
  21. Endif
  22. IF $Cpu EQ "3"
  23.   Copy Epson_Stylus_600.040 to t:Driver
  24. Endif
  25. Copy t:Driver to t:Epson_Stylus_580 Quiet
  26. Copy t:Driver to t:Epson_Stylus_600 Quiet
  27. Copy t:Driver to t:Epson_Stylus_640 Quiet
  28. Copy t:Driver to t:Epson_Stylus_660 Quiet
  29. Copy t:Driver to t:Epson_Stylus_670 Quiet
  30. Copy t:Driver to t:Epson_Stylus_680 Quiet
  31. Copy t:Driver to t:Epson_Stylus_700 Quiet
  32. Copy t:Driver to t:Epson_Stylus_740 Quiet
  33. Copy t:Driver to t:Epson_Stylus_750 Quiet
  34. Copy t:Driver to t:Epson_Stylus_760 Quiet
  35. Copy t:Driver to t:Epson_Stylus_800 Quiet
  36. Copy t:Driver to t:Epson_Stylus_850 Quiet
  37. Copy t:Driver to t:Epson_Stylus_870 Quiet
  38. Copy t:Driver to t:Epson_Stylus_880 Quiet
  39. Copy t:Driver to t:Epson_Stylus_900 Quiet
  40. Copy t:Driver to t:Epson_Stylus_C60 Quiet
  41. Copy t:Driver to t:Epson_Stylus_C70 Quiet
  42. Copy t:Driver to t:Epson_Stylus_C80 Quiet
  43. if Exists c:RequestFile
  44.   RequestFile >env:Driver Drawer t: Pattern "Epson#?" Title "Select Driver" Noicons
  45.   Copy $Driver Devs:Printers quiet
  46. Else
  47.   Copy t:Driver to Devs:Printers/Epson_Stylus_600
  48. Endif
  49. Delete Sys:Prefs/EpsonPrefs#? Envarc:EpsonPrefs.prefs quiet
  50. Delete t:Driver t:Epson#? quiet
  51. RequestChoice >env:NewPref "Printer Prefs" "Do you wish to change Printer Prefs?" "Yes|No"
  52. If $NewPref EQ "1"
  53.   sys:prefs/printer
  54. Endif
  55. RequestChoice >env:NewPref "PrinterGfx Prefs" "Do you wish to change PrinterGfx Prefs?" "Yes|No"
  56. If $NewPref EQ "1"
  57.   sys:prefs/printergfx
  58. Endif
  59.  
  60.